2 REM "FGM.6.0 DEMO PGM CHECKER.[194]
4 [151]55,0:[151]56,30:[156]:[151]53281,6
6 [153]"LOAD","CMDCMDCMDASCCHR$(null) V6 STR$VAL(null)(null) (null)(null)(null)CHR$(null)ATN(null) LENLEFT$VALLEN(null)VAL(null)":[141]56
8 [153]" STR$OES CHECKSUM OF ALL VITAL":[153]" PROGRAM FILES ON THE ASCCHR$(null) DISK."
10 [153]" (null)UT ASCCHR$(null) PROGRAMWAIT DISK IN DRIVE 8":[153]" AND PRESS (null)VAL(null)(null)(null)(null)."
12 [151]198,0:[146]198,1
14 [153]"ASCRIGHT$(null)VALWAIT      (null)RIGHT$(null)VALWAIT   VAL(null)(null)WAIT     SQR(null)(null)(null)WAIT"
16 [129]L[178]01[164]24[169]3:[135]F$,C1,C2:SL[178].:SH[178]32:F$[178]"ASCCHR$(null)"[170]F$[170]"*"
17 [139]L[178]1[167]F$[178]"FGM V6*"
19 [153]F$;:[143]:C1;C2:NEXT:END
20 [158]49232:[159]3,8,0,F$:[151]157,0:[151]185,0:[151]780,0
22 [151]781,SL:[151]782,SH:[158]65493:[160]3
24 EL[178][194](174):EH[178][194](175):ED[178]EL[170]256[172]EH:[151]253,EL:[151]254,EH
26 [159]1,8,15:[132]1,E,B$,C,D:[152]1,"UI":[160]1:[139]E[177]19[167][153]E;B$,F$:ER[178]ER[170]1:[137]50
28 [153][163]9);ED[171]8192;:[158]49152:D1[178][194](820)
30 D2[178]([194](821)[170]256[172][194](822))[170](65536[172][194](823))[170]983040[172][194](824)
32 [153][163]16);D1;[163]22);D2;:[139]C1[178]D1[167][139]C2[178]D2[167][153]" (null)(null)";
34 [153]:[139]C1[179][177]D1[167][153]"VAL(null)(null) ERRORWAIT:"F$
36 [139]C2[179][177]D2[167][153]"SQR(null)(null)(null) ERRORWAIT:"F$
38 [139]C1[179][177]D1[176]C2[179][177]D2[167]ER[178]ER[170]1
40 [137]50:[143] PRINTER OUTPUT
42 [159]4,4,7:[152]4,F$;[194](820);
44 [152]4,([194](821)[170]256[172][194](822))[170](65536[172][194](823))[170]983040[172][194](824)
46 [160]4
48 [143]  ?PEEK(251)+256*PEEK(252)
50 [130]L
52 [153]" ERRORS"ER;:[139]ER[178].[167][153]" ATNLL VITAL FILES ARE (null)(null)."
53 [153]:[153],"(null)VAL(null)VAL(null) LEN(null)(null)(null)(null)(null)VAL(null) PEEKVALASC(null)(null)VAL":[153],"(null)(null)ATNSTR$RIGHT$(null)CHR$ ATN(null)(null)(null)LEFT$VAL(null) (null)(null)(null)CHR$(null)ATN(null)!"
54 [151]55,0:[151]56,160:[156]:[128]
56 X[178]49152:FF[178]255
58 [135]Y:[151]X,Y:X[178]X[170]1:[139]Y[179]FF[167]58
60 [142]
62 [131] 160,5,169,0,153,51,3,136,208,250,234,133,251,169,32,133
64 [131] 252,160,0,177,251,240,33,72,77,52,3,141,52,3,104,24
66 [131] 109,53,3,141,53,3,144,16,238,54,3,141,32,208,208,8
68 [131] 238,55,3,208,3,238,56,3,136,208,216,230,251,208,2,230
70 [131] 252,165,251,197,253,208,202,165,252,197,254,208,196,96,234,234
71 [131] 169,0,133,251,169,32,133,252,162,68,160,0,169,0,145,251
72 [131] 200,208,251,230,252,202,208,242,96,234,255
74 [131]"FGM V6 ",040,23143782
75 [131]".PEEKLEN",056,20262980
76 [131]".(null)(null)",199,33700861
78 [131]".(null)(null)",145,15694085
80 [131]".(null)(null)",037,1371509
82 [131]".STR$(null)",239,12229443
84 [131]".CO",127,11687011
90 [131]"DPEEK(null)",178,12460170